# Basta mudar o diretrio?

getwd ()
setwd ("C:/Users/jess eduardo ortega/documents/CURSO-R/Aula-0")
getwd

No restitui o workspace
load (file="letras.rdata")

# Comando Perigoso

rm (list = ls())

load (file= ".rdata")

# Classes de objetos

letters
LETTERS
class (letters)
class (LETTERS)
letters <- as.factor (letters)
LETTERS <- as.factor (LETTERS)
 
#Bemvindo NotaR

carambola <- c("abacaxi","beterraba")
salada<- c("beringela", "batata")

#Remocao Objetos

load(file="bichos.rdata")
ls()
rm(temp1,temp2,temp3)
save(anfibios,aves,mamiferos, file="bichos01.rdata")

#Objetos de Data

hoje <- Sys.Date()
class (hoje)
copa.70 <- "1970-06-21"
class (copa.70)
copa.70 <- as.Date(copa.70, fotmat= "1970/06/21")
copa.70
class(copa.70)
hoje - copa.70
dif <- (hoje - copa.70)
dif
hoje + 43
outrodia <- (hoje + 43)

